home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / dierol1a / dierolle.frm < prev    next >
Text File  |  1999-10-08  |  27KB  |  904 lines
  1. VERSION 5.00
  2. Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"
  3. Begin VB.Form Form1 
  4.    BackColor       =   &H00C00000&
  5.    BorderStyle     =   1  'Fixed Single
  6.    Caption         =   " Die Roller"
  7.    ClientHeight    =   4725
  8.    ClientLeft      =   150
  9.    ClientTop       =   435
  10.    ClientWidth     =   6345
  11.    Icon            =   "DieRoller_Frm.frx":0000
  12.    LinkTopic       =   "Form1"
  13.    MaxButton       =   0   'False
  14.    MinButton       =   0   'False
  15.    ScaleHeight     =   4725
  16.    ScaleWidth      =   6345
  17.    StartUpPosition =   2  'CenterScreen
  18.    Begin MSComDlg.CommonDialog CommonDialog1 
  19.       Left            =   2775
  20.       Top             =   2160
  21.       _ExtentX        =   847
  22.       _ExtentY        =   847
  23.       _Version        =   393216
  24.    End
  25.    Begin VB.CommandButton Command3 
  26.       Appearance      =   0  'Flat
  27.       BackColor       =   &H00C0C0C0&
  28.       Caption         =   "Roll"
  29.       Height          =   375
  30.       Index           =   7
  31.       Left            =   915
  32.       Style           =   1  'Graphical
  33.       TabIndex        =   33
  34.       Top             =   4320
  35.       Width           =   495
  36.    End
  37.    Begin VB.CommandButton Command3 
  38.       Appearance      =   0  'Flat
  39.       BackColor       =   &H00C0C0C0&
  40.       Caption         =   "Roll"
  41.       Height          =   375
  42.       Index           =   6
  43.       Left            =   915
  44.       Style           =   1  'Graphical
  45.       TabIndex        =   32
  46.       Top             =   3720
  47.       Width           =   495
  48.    End
  49.    Begin VB.CommandButton Command3 
  50.       Appearance      =   0  'Flat
  51.       BackColor       =   &H00C0C0C0&
  52.       Caption         =   "Roll"
  53.       Height          =   375
  54.       Index           =   5
  55.       Left            =   915
  56.       Style           =   1  'Graphical
  57.       TabIndex        =   31
  58.       Top             =   3120
  59.       Width           =   495
  60.    End
  61.    Begin VB.CommandButton Command3 
  62.       Appearance      =   0  'Flat
  63.       BackColor       =   &H00C0C0C0&
  64.       Caption         =   "Roll"
  65.       Height          =   375
  66.       Index           =   4
  67.       Left            =   915
  68.       Style           =   1  'Graphical
  69.       TabIndex        =   30
  70.       Top             =   2520
  71.       Width           =   495
  72.    End
  73.    Begin VB.CommandButton Command3 
  74.       Appearance      =   0  'Flat
  75.       BackColor       =   &H00C0C0C0&
  76.       Caption         =   "Roll"
  77.       Height          =   375
  78.       Index           =   3
  79.       Left            =   915
  80.       Style           =   1  'Graphical
  81.       TabIndex        =   29
  82.       Top             =   1920
  83.       Width           =   495
  84.    End
  85.    Begin VB.CommandButton Command3 
  86.       Appearance      =   0  'Flat
  87.       BackColor       =   &H00C0C0C0&
  88.       Caption         =   "Roll"
  89.       Height          =   375
  90.       Index           =   2
  91.       Left            =   915
  92.       Style           =   1  'Graphical
  93.       TabIndex        =   28
  94.       Top             =   1320
  95.       Width           =   495
  96.    End
  97.    Begin VB.CommandButton Command3 
  98.       Appearance      =   0  'Flat
  99.       BackColor       =   &H00C0C0C0&
  100.       Caption         =   "Roll"
  101.       Height          =   375
  102.       Index           =   1
  103.       Left            =   915
  104.       Style           =   1  'Graphical
  105.       TabIndex        =   27
  106.       Top             =   720
  107.       Width           =   495
  108.    End
  109.    Begin VB.CommandButton Command3 
  110.       Appearance      =   0  'Flat
  111.       BackColor       =   &H00C0C0C0&
  112.       Caption         =   "Roll"
  113.       Height          =   375
  114.       Index           =   0
  115.       Left            =   915
  116.       Style           =   1  'Graphical
  117.       TabIndex        =   26
  118.       Top             =   120
  119.       Width           =   495
  120.    End
  121.    Begin VB.CommandButton Command2 
  122.       Appearance      =   0  'Flat
  123.       BackColor       =   &H00C0C0C0&
  124.       Caption         =   "-"
  125.       BeginProperty Font 
  126.          Name            =   "MS Sans Serif"
  127.          Size            =   8.25
  128.          Charset         =   0
  129.          Weight          =   700
  130.          Underline       =   0   'False
  131.          Italic          =   0   'False
  132.          Strikethrough   =   0   'False
  133.       EndProperty
  134.       Height          =   195
  135.       Index           =   7
  136.       Left            =   675
  137.       Style           =   1  'Graphical
  138.       TabIndex        =   25
  139.       Top             =   4515
  140.       Width           =   195
  141.    End
  142.    Begin VB.CommandButton Command1 
  143.       Appearance      =   0  'Flat
  144.       BackColor       =   &H00C0C0C0&
  145.       Caption         =   "+"
  146.       Height          =   195
  147.       Index           =   7
  148.       Left            =   675
  149.       Style           =   1  'Graphical
  150.       TabIndex        =   24
  151.       Top             =   4320
  152.       Width           =   195
  153.    End
  154.    Begin VB.CommandButton Command2 
  155.       Appearance      =   0  'Flat
  156.       BackColor       =   &H00C0C0C0&
  157.       Caption         =   "-"
  158.       BeginProperty Font 
  159.          Name            =   "MS Sans Serif"
  160.          Size            =   8.25
  161.          Charset         =   0
  162.          Weight          =   700
  163.          Underline       =   0   'False
  164.          Italic          =   0   'False
  165.          Strikethrough   =   0   'False
  166.       EndProperty
  167.       Height          =   195
  168.       Index           =   6
  169.       Left            =   675
  170.       Style           =   1  'Graphical
  171.       TabIndex        =   23
  172.       Top             =   3915
  173.       Width           =   195
  174.    End
  175.    Begin VB.CommandButton Command1 
  176.       Appearance      =   0  'Flat
  177.       BackColor       =   &H00C0C0C0&
  178.       Caption         =   "+"
  179.       Height          =   195
  180.       Index           =   6
  181.       Left            =   675
  182.       Style           =   1  'Graphical
  183.       TabIndex        =   22
  184.       Top             =   3720
  185.       Width           =   195
  186.    End
  187.    Begin VB.CommandButton Command2 
  188.       Appearance      =   0  'Flat
  189.       BackColor       =   &H00C0C0C0&
  190.       Caption         =   "-"
  191.       BeginProperty Font 
  192.          Name            =   "MS Sans Serif"
  193.          Size            =   8.25
  194.          Charset         =   0
  195.          Weight          =   700
  196.          Underline       =   0   'False
  197.          Italic          =   0   'False
  198.          Strikethrough   =   0   'False
  199.       EndProperty
  200.       Height          =   195
  201.       Index           =   5
  202.       Left            =   675
  203.       Style           =   1  'Graphical
  204.       TabIndex        =   21
  205.       Top             =   3315
  206.       Width           =   195
  207.    End
  208.    Begin VB.CommandButton Command1 
  209.       Appearance      =   0  'Flat
  210.       BackColor       =   &H00C0C0C0&
  211.       Caption         =   "+"
  212.       Height          =   195
  213.       Index           =   5
  214.       Left            =   675
  215.       Style           =   1  'Graphical
  216.       TabIndex        =   20
  217.       Top             =   3120
  218.       Width           =   195
  219.    End
  220.    Begin VB.CommandButton Command2 
  221.       Appearance      =   0  'Flat
  222.       BackColor       =   &H00C0C0C0&
  223.       Caption         =   "-"
  224.       BeginProperty Font 
  225.          Name            =   "MS Sans Serif"
  226.          Size            =   8.25
  227.          Charset         =   0
  228.          Weight          =   700
  229.          Underline       =   0   'False
  230.          Italic          =   0   'False
  231.          Strikethrough   =   0   'False
  232.       EndProperty
  233.       Height          =   195
  234.       Index           =   4
  235.       Left            =   675
  236.       Style           =   1  'Graphical
  237.       TabIndex        =   19
  238.       Top             =   2715
  239.       Width           =   195
  240.    End
  241.    Begin VB.CommandButton Command1 
  242.       Appearance      =   0  'Flat
  243.       BackColor       =   &H00C0C0C0&
  244.       Caption         =   "+"
  245.       Height          =   195
  246.       Index           =   4
  247.       Left            =   675
  248.       Style           =   1  'Graphical
  249.       TabIndex        =   18
  250.       Top             =   2520
  251.       Width           =   195
  252.    End
  253.    Begin VB.CommandButton Command2 
  254.       Appearance      =   0  'Flat
  255.       BackColo